#pragma once

#include <iostream>
#include <string>
#include <cstring>
#include <cassert>
#include <pthread.h>
#include <memory>
#include <unordered_map>

#include <sys/types.h>
#include <sys/socket.h>
#include <arpa/inet.h>
#include <netinet/in.h>
#include <unistd.h>
#include <sys/wait.h>
#include "ThreadPool/log.hpp"
#include "ThreadPool/ThreadPool.hpp"
#include "ThreadPool/Task.hpp"

static void service(int sock, const std::string clientip, const uint16_t clientport)
{
    char buffer[1024];
    while (true)
    {
        // 可以直接使用read/write
        ssize_t s = read(sock, buffer, sizeof(buffer) - 1);
        if (s > 0)
        {
            buffer[s] = 0;
            std::cout << clientip << ": " << clientport << "# " << buffer << std::endl;
            // 回显
            write(sock, buffer, strlen(buffer));
        }
        else if (s == 0) // 对端关闭连接
        {
            logMessage(NORMAL, "%s:%d shutdown, me too!", clientip.c_str(), clientport);
            break;
        }
        else
        {
            logMessage(ERROR, "Read error, %d:%s", errno, strerror(errno));
            break;
        }
    }
    close(sock);
}

static void change(int sock, const std::string clientip, const uint16_t clientport)
{
    char buffer[1024];
    while (true)
    {
        memset(buffer, 0, sizeof(buffer));
        ssize_t s = read(sock, buffer, sizeof(buffer) - 1);
        if (s > 0)
        {
            buffer[s] = 0;
            std::cout << clientip << ": " << clientport << "# " << buffer << std::endl;
            std::string message;
            char *start = buffer;
            while (*start)
            {
                char c;
                if (islower(*start))
                    c = toupper(*start); // islower 判断该字母是否是小写字母, toupper 把小写转成大写
                else
                    c = *start;
                message += c;
                start++;
            }
            write(sock, message.c_str(), message.size());
        }
        else if (s == 0)
        {
            logMessage(NORMAL, "%s:%d shutdown, me too!", clientip.c_str(), clientport);
            break;
        }
        else
        {
            logMessage(ERROR, "Read error, %d:%s", errno, strerror(errno));
            break;
        }
    }
    close(sock);
}

static void dictOnline(int sock, const std::string clientip, const uint16_t clientport)
{
    char buffer[1024];
    static std::unordered_map<std::string, std::string> dict ={
        {"apple", "苹果"},
        {"bit", "比特"},
        {"banana", "香蕉"},
        {"hard", "好难"}
    };

    while (true)
    {
        ssize_t s = read(sock, buffer, sizeof(buffer) - 1);
        if (s > 0)
        {
            buffer[s] = 0;
            std::cout << clientip << ": " << clientport << "# " << buffer << std::endl;
            std::string message;
            auto iter = dict.find(buffer);
            if (iter == dict.end()) message = "我不知道...";
            else    message = iter->second;
            write(sock, message.c_str(), message.size());
        }
        else if (s == 0) // 对端关闭连接
        {
            logMessage(NORMAL, "%s:%d shutdown, me too!", clientip.c_str(), clientport);
            break;
        }
        else
        {
            logMessage(ERROR, "Read error, %d:%s", errno, strerror(errno));
            break;
        }
    }
    close(sock);
}

class Data
{
public:
    Data() {}

public:
    int _sock;
    std::string _ip;
    uint16_t _port;
};

class TcpServer
{
private:
    const static int gbacklog = 20; // 全连接队列的大小

    static void *threadRoutine(void *args)
    {
        pthread_detach(pthread_self()); // 进行线程分离,主线程就不用等待了
        Data *td = (Data *)args;
        service(td->_sock, td->_ip, td->_port);
        delete td;
        return nullptr;
    }

public:
    TcpServer(uint16_t port, std::string ip = "0.0.0.0")
        : _port(port), _ip(ip), _listensock(-1), threadpool_ptr(ThreadPool<Task>::getThreadPool()) // 这里我初始化了
    {
    }

    void initServer()
    {
        // 1.创建套接字
        _listensock = socket(AF_INET, SOCK_STREAM, 0); // 创建网络套接字,以流的方式
        if (_listensock < 0)
        {
            logMessage(FATAL, "create error, %d: %s", errno, strerror(errno));
            exit(2);
        }
        logMessage(NORMAL, "create listensock success, _listensock: %d", _listensock);

        // 2.bind
        struct sockaddr_in local;
        memset(&local, 0, sizeof(local)); // 清零
        local.sin_family = AF_INET;
        local.sin_port = htons(_port);                  // 端口 主机到网络
        local.sin_addr.s_addr = inet_addr(_ip.c_str()); // 地址 字符串 -> 点分十进制
        // inet_pton(AF_INET, _ip.c_str(), &local.sin_addr);  // 这里是 inet_pton 和 inet_aton 是没有任何区别的
        // inet_aton(_ip.c_str(), &local.sin_addr);

        if (bind(_listensock, (struct sockaddr *)&local, sizeof(local)) < 0)
        {
            logMessage(FATAL, "bind error, %d: %s", errno, strerror(errno));
            exit(3);
        }

        // 3.因为TCP是面向连接的,正式通信的时候,需要先建立连接
        if (listen(_listensock, gbacklog) < 0)
        {
            logMessage(FATAL, "listen error, %d: %s", errno, strerror(errno));
            exit(4);
        }
        logMessage(NORMAL, "bind success");
    }

    void start()
    {
        // 线程池版本 -> 运行线程池
        threadpool_ptr->run(); // 我在start()开始就让它运行起来

        while (true)
        {
            // 4.获取连接
            struct sockaddr_in src;
            socklen_t len = sizeof(src);
            int servicesock = accept(_listensock, (struct sockaddr *)&src, &len);
            if (servicesock < 0)
            {
                logMessage(ERROR, "accept error, %d: %s", errno, strerror(errno));
                continue; // 获取连接失败后不是退出,而是重新获取连接 -> continue
            }
            // 这里就获取连接成功了
            uint16_t client_port = ntohs(src.sin_port);
            std::string client_ip = inet_ntoa(src.sin_addr);
            logMessage(NORMAL, "link success, serversock: %d | %s : %d |\n",
                       servicesock, client_ip.c_str(), client_port);

            // 开始通信服务

            // // 1.0 版本  -> 单进程循环版
            // service(servicesock, client_ip, client_port);

            // // 2.0 版本 -> 多进程版
            // pid_t id = fork();
            // assert(id != -1);
            // if (id == 0)
            // {
            //     close(_listensock);  // 子进程这里不需要监听,关了它,这里只使用servicesock来读写即可
            //     service(servicesock, client_ip, client_port);
            //     exit(0);
            // }
            // close(servicesock); // 父进程这里只需要监听,不需要读写的
            // waitpid(-1, nullptr, 0); // 这里阻塞等即可,不想等也可以忽略信号 SIGCHLD 使用SIG_IGN忽略

            // // 3.0 版本 -> 多线程版
            // Data* td = new Data();
            // td->_sock = servicesock;
            // td->_ip = client_ip;
            // td->_port = client_port;

            // pthread_t tid;
            // pthread_create(&tid, nullptr, threadRoutine, (void*)td);
            // // 这里注意线程和进程不同,进程之间是子进程继承父进程的资源,然后独立的
            // // 而线程之间都是共享的,这里的文件描述符也是共享的,所以不可以关闭文件描述符

            // 4.0 版本 -> 线程池版
            // Task t(servicesock, client_ip, client_port, service);  // 把任务放到线程池中即可
            // Task t(servicesock, client_ip, client_port, change);
            Task t(servicesock, client_ip, client_port, dictOnline);
            threadpool_ptr->PushTask(t); // 有任务他会自动运行
        }
    }

    ~TcpServer() {}

private:
    uint16_t _port;
    std::string _ip;
    int _listensock;
    std::unique_ptr<ThreadPool<Task>> threadpool_ptr; // 定义
};
